home *** CD-ROM | disk | FTP | other *** search
/ Softdisk Supreme / Softdisk Supreme.iso / pc / DSK Files / 0-49 / SD017a.dsk / PAL.10573.PIAZZA.FEB.83.A.bas < prev    next >
BASIC Source File  |  2003-06-12  |  2KB  |  50 lines
  1. 5  HOME : GOTO 30
  2. 10  VTAB 24: PRINT "TO CONTINUE, PRESS THE ";: INVERSE : PRINT "RETURN";: NORMAL : INPUT " KEY. ";R$: HOME 
  3. 20  RETURN 
  4. 30  PRINT "  WALT MARCINKCO WHO RUNS 'APPLE CITY'"
  5. 35  PRINT 
  6. 40  PRINT "FOR THE SOURCE IS OFFERING 'THE MUSIC"
  7. 45  PRINT 
  8. 50  PRINT "DISK'. THE DISK CONSISTS OF 33 MUSICAL"
  9. 55  PRINT 
  10. 60  PRINT "SELECTIONS CREATED WITH THE HELP OF 'E-"
  11. 65  PRINT 
  12. 70  PRINT "LECTRIC DUET'. THE SELECTIONS ARE DI-"
  13. 75  PRINT 
  14. 80  PRINT "VIDED INTO FOUR CATAGORIES:"
  15. 85  PRINT : PRINT 
  16. 90  PRINT "CLASSICAL GEMS,"; TAB( 20);"ROMANTIC DELIGHTS"
  17. 95  PRINT 
  18. 100  PRINT "THE GAY NINETIES"; TAB( 20);"AMERICAN SALUTE"
  19. 105  PRINT : PRINT 
  20. 110  PRINT "SPANNING ONE-AND-A-QUARTER-HOURS."
  21. 115  GOSUB 10
  22. 130  PRINT "WALT ASKS THAT YOU SEND A BLANK DISK"
  23. 135  PRINT 
  24. 140  PRINT "AND A SELF-ADDRESSED-STAMPED-MAILER."
  25. 145  PRINT 
  26. 150  PRINT "PAYMENT OF $5.00 CAN EITHER BE SENT"
  27. 155  PRINT 
  28. 160  PRINT "WITH YOUR ORDER OR AFTER YOU RECEIVE"
  29. 165  PRINT 
  30. 170  PRINT "'THE MUSIC DISK'."
  31. 175  PRINT 
  32. 180  PRINT "  I ORDERED A COPY OF THE DISK AND I"
  33. 185  PRINT 
  34. 190  PRINT "THINK IT IS GREAT."
  35. 195  PRINT 
  36. 200  PRINT "  ALTHOUGH 'THE MUSIC DISK' IS ADVER-"
  37. 205  PRINT 
  38. 210  PRINT "TISED ON THE SOURCE, WALT GAVE ME PER-"
  39. 215  PRINT 
  40. 220  PRINT "MISSION TO TELL SOFTDISK MAGAZETTE SUB-"
  41. 225  GOSUB 10
  42. 230  PRINT "SCRIBERS ABOUT IT."
  43. 235  PRINT 
  44. 240  PRINT "THE ADDRESS TO ORDER THE DISK IS:"
  45. 245  PRINT : PRINT 
  46. 250  PRINT  TAB( 5);"WALTER MARCINKCO JR."
  47. 260  PRINT  TAB( 5);"1239 WEST JARRETSVILLE ROAD"
  48. 270  PRINT  TAB( 5);"FOREST HILLS, MARYLAND 21050"
  49. 275  GOSUB 10
  50. 280  PRINT  CHR$(4)"RUN PAL.MENU"